<?php
/*
+---------------------------------------------------------------------------
|   PHP-IRC v2.2.1 Service Release
|   ========================================================
|   by Manick
|   (c) 2001-2005 by http://www.phpbots.org/
|   Contact: manick@manekian.com
|   irc: #manekian@irc.rizon.net
|   ========================================
+---------------------------------------------------------------------------
|   > parser module
|   > Module written by Manick
|   > Module Version Number: 2.2.0
+---------------------------------------------------------------------------
|   > This program is free software; you can redistribute it and/or
|   > modify it under the terms of the GNU General Public License
|   > as published by the Free Software Foundation; either version 2
|   > of the License, or (at your option) any later version.
|   >
|   > This program is distributed in the hope that it will be useful,
|   > but WITHOUT ANY WARRANTY; without even the implied warranty of
|   > MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
|   > GNU General Public License for more details.
|   >
|   > You should have received a copy of the GNU General Public License
|   > along with this program; if not, write to the Free Software
|   > Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+---------------------------------------------------------------------------
|   Changes
|   =======-------
|   > If you wish to suggest or submit an update/change to the source
|   > code, email me at manick@manekian.com with the change, and I
|   > will look to adding it in as soon as I can.
+---------------------------------------------------------------------------
*/

class parser {

	private $cmd;
	private $args;
	private $timers = array();

	private $cmdList = array();
	private $cmdTypes = array();
	
	private $fileModified = array();
	private $loadDefError = false;

	//Classes
	private $ircClass;
	private $dccClass;
	private $timerClass;
	private $socketClass;
	private $db;

/*  Part of easy alias idea I've been working on..., look below for large bit of commented out code
    for info...

	private $aliasArray = array(	"notice"			=>	"ircClass",
									"privMsg"			=>	"ircClass",
									"action"			=>	"ircClass",
									"sendRaw"			=>	"ircClass",
									"getNick"			=>	"ircClass",
									"isOnline"			=>	"ircClass",
									"isMode"			=>	"ircClass",
									"isChanMode"		=>	"ircClass",
									"sendFile"			=>	"dccClass",
									"dccInform"			=>	"dccClass",
									"addTimer"			=>	"timerClass",
									"addListener"		=>	"socketClass",
									"removeTimer"		=>	"timerClass",
	);
*/

	public function __construct() {
		$this->fileModified = array();
	}
	
	public function init()
	{

		if ($this->ircClass->getClientConf('functionfile') != "")
		{
			$this->loadFuncs($this->ircClass->getClientConf('functionfile'));
		}

	}

	public function setDccClass($class)
	{
		$this->dccClass = $class;
	}

	public function setIrcClass($class)
	{
		$this->ircClass = $class;
	}

	public function setTimerClass($class)
	{
		$this->timerClass = $class;
	}

	public function setSocketClass($class)
	{
		$this->socketClass = $class;
	}

	public function setDatabase($class)
	{
		$this->db = $class;
	}
	
	public function getCmdList($type = "")
	{
		if ($type == "")
		{
			return $this->cmdList;
		}
		else
		{
			if (isset($this->cmdList[$type]))
			{
				return $this->cmdList[$type];
			}
			else
			{
				return false;
			}
		}
	}
	
	public function destroyModules()
	{
		if (is_array($this->cmdList) && count($this->cmdList) > 0)
		{
			if (isset($this->cmdList['file']) && is_array($this->cmdList['file']))
			{
				foreach ($this->cmdList['file'] AS $index => $data)
				{
					if (is_object($data['class']))
					{
						$data['class']->destroy();
					}
				}
			}
		}
	}

	private function readFile($file)
	{

		$configRaw = file_get_contents($file);

		if ($configRaw === false)
		{
			if (DEBUG == 1)
			{
				echo "Could not find function file '$file' or error.\n";
			}
			$this->dccClass->dccInform("Could not find function file '$file' or error.");
			return false;
		}
		
		return $configRaw;

	}

	public function include_recurse($file)
	{
		$configRaw = $this->readFile($file);

		if ($configRaw === false)
		{
			return false;
		}

		$configRaw = preg_replace("/;(.*\n?)?/", "\n", $configRaw);
		$configRaw = preg_replace("/~.*\n/", "", $configRaw);
		
		$configRaw = trim($configRaw);
		
		$lines = explode("\n", $configRaw);

		$num = 0;
		$lineNo = 1;
		$extra = 0;
		$fullLine = "";
		foreach ($lines as $line)
		{
			$line = trim($line);

			if ($line == "")
			{
				$lineNo++;
				continue;
			}

			$line = trim($fullLine . " " . $line);

			$newLine = $this->parseFunc($file, $lineNo, $line);

			$lineNo += $extra + 1;
			$extra = 0;
			$fullLine = "";

			if ($newLine === false)
			{
				continue;
			}

			if ($newLine['type'] == "type")
			{
				$this->cmdTypes[$newLine['typeArray']['name']]['numArgs'] = count($newLine['typeArray']);
				$this->cmdTypes[$newLine['typeArray']['name']]['args'] = $newLine['typeArray'];
			}
			else if ($newLine['type'] == "include")
			{
				if (isset($newLine['typeArray'][0]))
				{
					$num += $this->include_recurse($newLine['typeArray'][0]);
				}
				else
				{
					if (DEBUG == 1)
					{
						echo "Malformed include line on line " . $lineNo . " of function file: " . $file . "\n";
					}
					$this->dccClass->dccInform("Malformed include line on line " . $lineNo . " of function file: " . $file);
				}
			}
			else
			{
				if (!isset($newLine['typeArray']['name']))
				{
					$name = irc::randomHash() . "_" . rand(1,1024);
				}
				else
				{
					$name = $newLine['typeArray']['name'];
				}

				unset($newLine['typeArray']['name']);

				$this->cmdList[$newLine['type']][$name] = $newLine['typeArray'];
				
				if (isset($this->cmdList[$newLine['type']][$name]['usage']))
				{
					if (isset($oldCmdList[$newLine['type']][$name]['usage']))
					{
						$this->cmdList[$newLine['type']][$name]['usage'] = $oldCmdList[$newLine['type']][$name]['usage'];
					}
				}

			}

			$num++;
		}

		return $num;
	}




	public function loadFuncs($file)
	{
		$error = false;

		clearstatcache();

		$this->destroyModules();

		$oldCmdList = $this->cmdList;
		if (!is_array($oldCmdList))
		{
			$oldCmdList = array();
		}

		unset($this->cmdList);
		unset($this->cmdTypes);
		$this->cmdList = array();
		$this->cmdTypes = array();

		$this->dccClass->dccInform("Rehashing Function File, please wait...");
		if (DEBUG == 1)
		{
			echo "Rehashing Function File, please wait...\n";
		}

		//Read in main function file
		$num = $this->include_recurse($file);

		//Book keeping
		foreach ($this->cmdList AS $cmd => $data)
		{
			ksort($this->cmdList[$cmd]);
		}

		if (isset($this->cmdList['file']))
		{
			foreach ($this->cmdList['file'] AS $file => $data)
			{

				$classDef = $this->loadClassDef($data['filename'], $file);

				if ($this->loadDefError == true)
				{
					$error = true;
				}
				$this->loadDefError = false;

				if ($classDef === false)
				{
					continue;
				}

				//require_once($data['filename']);

				$this->cmdList['file'][$file]['class'] = new $classDef;

				$this->cmdList['file'][$file]['class']->__setClasses(	$this->ircClass,
																		$this->dccClass,
																		$this->timerClass,
																		$this,
																		$this->socketClass,
																		$this->db
																);
				$this->cmdList['file'][$file]['class']->init();
			}
		}

		$this->dccClass->dccInform("Successfully loaded " . $num . " functions into memory.");
		if (DEBUG == 1)
		{
			echo "Successfully loaded " . $num . " functions into memory.\n";
		}
		
		return $error;

	}

	private function loadClassError($filename, $msg)
	{
		$this->ircClass->log("Error loading $filename: $msg");
		$this->dccClass->dccInform("Error loading $filename: $msg");
	}

	/* Okay..
	 * This method is really freaking cool.  It loads a module file with fopen, then
	 * it finds the classname, and gives it a random name (changes it) so that you can
	 * include functions you've changed multiple times without having to restart the bot!
	 * Also, easier names than having to use $this->ircClass->blah() all the time, you can
	 * just use blah()... These are defined in an array somewhere... I'm not sure where yet...
	 * because I haven't written that yet!!!!!!!!!!!!111oneone.
	 */

	private function loadClassDef($filename, $classname)
	{

		$stat = stat($filename);

		if ($stat === false)
		{
			$this->loadClassError($filename, "Could not find function file");
			return false;
		}

		$modified = $stat['mtime'];

		if (isset($this->fileModified[$filename]))
		{
			if ($modified == $this->fileModified[$filename]['modified'])
			{
				return $this->fileModified[$filename]['classdef'];
			}
		}

		$fileData = file_get_contents($filename);

		if ($fileData === false)
		{
			$this->loadClassError($filename, "Could not find function file");
			return false;
		}

		//Okay, we have the module now.. now we need to find some stuff.

		if (!preg_match("/class[\s]+?".$classname."[\s]+?extends[\s]+?module[\s]+?{/", $fileData))
		{
			$this->loadClassError($filename, "Could not find valid classdef in function file");
			return false;
		}

		//Okay, our module is in the file... replace it with random hash.

		$newHash = irc::randomHash();

		$newClassDef = $classname . "_" . $newHash;

		$fileData = preg_replace("/(class[\s]+?)".$classname."([\s]+?extends[\s]+?module[\s]+?{)/", "\\1" . $newClassDef . "\\2", $fileData);

		/* Interesting idea, but lets leave it out for now
		foreach($this->aliasArray AS $func => $class)
		{
			$fileData = preg_replace("/([=\n\(\t\s]+?)".$func."[\s\t\n\r]*?\(/s", "\\1\$this->" . $class . "->" . $func . "(", $fileData);
		}
		*/
		
		$success = eval("?>" . $fileData . "<?php ");

		if ($success === false)
		{
			$this->loadClassError($filename, "Error in function file");
		
			/* Attempt to fallback on a previous revision that worked! */
			if (isset($this->fileModified[$filename]))
			{
				$this->loadClassError($filename, "Using a cached version of the class definition");
				$this->loadDefError = true;
				return $this->fileModified[$filename]['classdef'];
			}

			return false;
		}
		
		$this->fileModified[$filename]['modified'] = $modified;
		$this->fileModified[$filename]['classdef'] = $newClassDef;

		return $newClassDef;

	}

	//Used to show array, as there seems to be some crazy bug in var_dump/print_r that
	//shows EVERY variable in my program when I do var_dump($this->cmdList) or use print_r the same way
	//This isn't used anywhere in the production copy of this script. (DEBUG ONLY!)
	private function show_all($title, $array, $level)
	{
		echo $title . " = array(" . "\r\n";

		foreach($array AS $index => $val)
		{
			for ($i = 0; $i < $level; $i++)
			{
				echo " ";
			}

			if (is_array($val))
			{
				$this->show_all($index, $val, $level + 1);
			}
			else if (is_object($val))
			{
				echo "[$index] => [object]\r\n";
			}
			else
			{
				echo "[$index] => [$val]\r\n";
			}
		}

		for ($i = 0; $i < $level; $i++)
		{
			echo " ";
		}

		echo ")\r\n";

	}
	
	public function setCmdListValue($type, $cmd, $var, $value)
	{
		if (isset($this->cmdList[$type][$cmd][$var]))
		{
			$this->cmdList[$type][$cmd][$var] = $value;
			return true;
		}
		return false;
	}

	private function parseFunc($file, $lineNo, $line)
	{
		$strings = array();
		$line = str_replace("\t", " ", $line);

		$quotes = array("'", "\"");

		foreach($quotes AS $quote)
		{
			$currPos = 0;
			$extraPos = 0;
			while (($firstPos = strpos($line, $quote, $currPos)) !== false && substr($line, strpos($line, $quote, $currPos)-1, 1) != "\\")
			{

				while (($secondPos = strpos($line, $quote, $firstPos + 1 + $extraPos)) !== false && substr($line, strpos($line, $quote, $firstPos + 1 + $extraPos)-1, 1) == "\\")
				{
					$extraPos = $secondPos;
				}

				if ($secondPos === false)
				{
					if (DEBUG == 1)
					{
						echo "Syntax Error on line " . $lineNo . " of function file: " . $file . ".  Expected '".$quote."', got end of line.\n";
					}
					$this->dccClass->dccInform("Syntax Error on line " . $lineNo . " of function file: " . $file . ".  Expected '".$quote."', got end of line.");
					return false;
				}

				$strings[$quote][] = substr($line, $firstPos + 1, $secondPos - $firstPos - 1);
				$currPos = $secondPos + 1;
			}
		}

		foreach ($strings AS $string)
		{
			$line = str_replace($string, "", $line);
		}

		$lineElements = explode(chr(32), $line);

		$type = "";
		$currElement = 0;
		$typeArray = array();

		foreach($lineElements AS $element)
		{
			if (trim($element) == "")
			{
				continue;
			}

			$currElement++;

			if ($currElement == 1)
			{
				$element = irc::myStrToLower($element);

				if ($element == "type")
				{
					$type = "type";
				}
				else if ($element == "include")
				{
					$type = "include";
				}
				else
				{
					if (isset($this->cmdTypes[$element]))
					{
						$type = $element;
					}
					else
					{
						if (DEBUG == 1)
						{
							echo "Error: Undefined type, '" . $element . "' on line " . $lineNo . " of function file: " . $file . "\n";
						}
						$this->dccClass->dccInform("Error: Undefined type, '" . $element . "' on line " . $lineNo . " of function file: " . $file . "");
						return false;
					}
				}
				continue;
			}

			if ($element == "\"\"")
			{
				$element = array_shift($strings["\""]);
			}
			else if ($element == "''")
			{
				$element = array_shift($strings["'"]);
			}

			$element = str_replace("\\" . "'", "'", $element);
			$element = str_replace("\\" . '"', '"', $element);

			if ($type == "type")
			{
				if ($currElement == 2)
				{
					$typeArray['name'] = $element;
				}
				else
				{
					$typeArray[] = $element;
				}
			}
			else if ($type == "include")
			{
				$typeArray[] = $element;
			}
			else
			{
				if ($currElement > $this->cmdTypes[$type]['numArgs'])
				{
					if (DEBUG == 1)
					{
						echo "Error on line " . $lineNo . " of function file: " . $file . ", too many arguments\n";
					}
					$this->dccClass->dccInform("Error on line " . $lineNo . " of function file: " . $file . ", too many arguments");
					return false;
				}

				$element = (irc::myStrToLower($element) == "true" ? true : $element);
				$element = (irc::myStrToLower($element) == "false" ? false : $element);

				$typeArray[$this->cmdTypes[$type]['args'][ $currElement - 2 ]] = $element;
			}


		}

		if ($type != "type" && $type != "include")
		{
			if ($currElement < $this->cmdTypes[$type]['numArgs'])
			{
				if (DEBUG == 1)
				{
					echo "Error on line " . $lineNo . " of function file: " . $file . ", not enough arguments\n";
				}
				$this->dccClass->dccInform("Error on line " . $lineNo . " of function file: " . $file . ", not enough arguments");
				return false;
			}
		}

		return array('type' => $type, 'typeArray' => $typeArray);

	}



	public function parseDcc($chat, $handler)
	{

		$chat->readQueue = str_replace("\r", "", $chat->readQueue);

//		if (!($offSet = strpos($chat->readQueue, "\n")))
//		{
//			return false;
//		}
//		$rawLine = trim(substr($chat->readQueue, 0, $offSet));
//		$chat->readQueue = substr($chat->readQueue, $offSet + 1);

		$rawLine = $chat->readQueue;
		$chat->readQueue = "";

		$this->ircClass->log("DCC Chat(" . $chat->nick . "): " . $rawLine);

		$line = $this->createLine($rawLine);

		if ($line == false)
		{
			return;
		}

		if ($handler != false)
		{
			if (is_object($handler))
			{
				$handler->handle($chat, $line);
				return;
			}
		}

		if ($chat->isAdmin == true && $chat->verified == false)
		{
			if (md5($line['cmd']) == $this->ircClass->getClientConf('dccadminpass'))
			{
				$this->dccClass->dccInform("DCC: " . $chat->nick . " has successfully logged in.");
				$chat->verified = true;
				$chat->dccSend("You have successfully logged in.");

			}
			else
			{
				$chat->dccSend("Invalid password, bye bye.");
				$this->dccClass->disconnect($chat);
			}
			return;
		}

		$cmdLower = irc::myStrToLower($line['cmd']);

		if (isset($this->cmdList['dcc'][$cmdLower]))
		{
			if ($this->cmdList['dcc'][$cmdLower]['admin'] == 1 && !$chat->isAdmin)
			{
				$chat->dccSend("Request Denied.  You must have admin access to use this function.");
				return;
			}

			if ($line['nargs'] < $this->cmdList['dcc'][$cmdLower]['numArgs'])
			{
				$chat->dccSend("Usage: " . $cmdLower . " " . $this->cmdList['dcc'][$cmdLower]['usage']);
				return;
			}

			$module = $this->cmdList['dcc'][$cmdLower]['module'];
			$class = $this->cmdList['file'][$module]['class'];
			$func = $this->cmdList['dcc'][$cmdLower]['function'];

			$class->$func($chat, $line);

			if ($chat->isAdmin)
			{
				$chat->dccSend("ADMIN " . irc::myStrToUpper($cmdLower) . " Requested");
			}
			else
			{
				$chat->dccSend("CLIENT " . irc::myStrToUpper($cmdLower) . " Requested");
			}
		}
		else
		{
			$chat->dccSend("Invalid Command: " . $line['cmd']);
		}

	}


	public static function createLine($rawLine)
	{

		$line = array();
		$rawLineArray = explode(chr(32), $rawLine);
		$lineCount = count($rawLineArray);

		if ($lineCount < 1)
		{
			return false;
		}
		else if ($lineCount == 1)
		{
			$line['cmd'] = irc::myStrToLower($rawLine);
			$line['nargs'] = 0;
			$line['query'] = "";
		}
		else
		{
			$line['nargs'] = 0;
			$line['cmd'] = irc::myStrToLower(array_shift($rawLineArray));
			while (($arg = array_shift($rawLineArray)) !== NULL) // NULL fixed contributed by cortex, 05/01/05
			{
				if (trim($arg) == "")
				{
					continue;
				}

				$line['arg' . ++$line['nargs']] = $arg;
				if ($line['nargs'] > MAX_ARGS-1)
				{
					break;
				}
			}
			$line['query'] = trim(substr($rawLine, strlen($line['cmd']) + 1));
		}

		return $line;

	}

	public function parseLine($line)
	{
		if (DEBUG==1)
		{
			//print_r($line);
		}

		if ($this->ircClass->checkIgnore($line['from']))
		{
			return;
		}

		switch($line['cmd'])
		{
			case "PRIVMSG":
				$args = $this->createLine($line['text']);
				$cmdLower = irc::myStrToLower($args['cmd']);
				if (isset($this->cmdList['priv'][$cmdLower]))
				{
					if ($this->cmdList['priv'][$cmdLower]['active'] == true)
					{
						$theCase = $this->ircClass->floodCheck($line);

						switch ($theCase)
						{
							case STATUS_NOT_BANNED:
								if ($this->cmdList['priv'][$cmdLower]['inform'] == true)
								{
									$this->dccClass->dccInform("Sending " . irc::myStrToUpper($line['text']) . " to " . $line['fromNick']);
								}
								$this->cmdList['priv'][$cmdLower]['usage']++;
								$func = $this->cmdList['priv'][$cmdLower]['function'];
								$module = $this->cmdList['priv'][$cmdLower]['module'];
								$class = $this->cmdList['file'][$module]['class'];

								if ($this->ircClass->getTextQueueLength() > 5)
								{
									$this->ircClass->notice($line['fromNick'], "Request Queued.  Please wait " . $this->ircClass->getTextQueueLength() . " seconds for your data.", 0);
								}

								$class->$func($line, $args);
								break;
							case STATUS_JUST_BANNED:
								$this->ircClass->notice($line['fromNick'], "Flood Detected. All of your queues have been discarded and you have been banned from using this bot for ". $this->ircClass->getClientConf('floodtime') . " seconds.");
								$this->dccClass->dccInform("BAN: (*!". irc::myStrToUpper($line['fromHost']) . "): " . $line['fromNick'] . " is on ignore for " . $this->ircClass->getClientConf('floodtime') . " seconds.");
								break;
							case STATUS_ALREADY_BANNED:
								break;
						}
					}
					else
					{
						$this->dccClass->dccInform("FUNCTION: " . $line['fromNick'] . " attempted to use deactivated command '" . $cmdLower . "'");
					}
				}
				else
				{
					if ($line['to'] == $this->ircClass->getNick())
					{
						if (strpos($line['text'], chr(1)) !== false)
						{
							$this->ircClass->floodCheck($line);
							$this->parseCtcp($line);
						}
						else
						{
							$this->dccClass->dccInform("PRIVMSG: <" . $line['fromNick'] . "> " . $line['text']);
						}
					}
					else
					{
						if (strpos($line['text'], chr(1)) !== false)
						{
							$this->parseCtcp($line, "CHAN: " . $line['to']);
						}
						else
						{
							$chanData = $this->ircClass->getChannelData($line['to']);
							
							if ($chanData == NULL)
							{
								$this->dccClass->dccInform("CHAN PRIVMSG [".$line['to']."]: <" . $line['fromNick'] . "> " . $line['text']);
							}
						}
					}
				}
				break;

			case "MODE":
				break;

			case "NOTICE":
				$chan = $line['to'] != $this->ircClass->getNick() ? ":" . $line['to'] : "";
				$this->dccClass->dccInform("NOTICE: <" . ($line['fromNick'] == "" ? $line['from'] : $line['fromNick']) . $chan . "> " . $line['text']);
				break;

			case "JOIN":
				if ($line['fromNick'] == $this->ircClass->getNick())
				{
					$this->dccClass->dccInform("Joined: " . irc::myStrToUpper($line['text']));
				}
				break;

			case "PART":
				if ($line['fromNick'] == $this->ircClass->getNick())
				{
					$this->dccClass->dccInform("Parted: " . irc::myStrToUpper($line['to']));
				}
				break;

			case "KICK":
				if ($line['params'] == $this->ircClass->getNick())
				{
					$this->dccClass->dccInform("Kicked: " . $line['fromNick'] . " kicked you from " . $line['to']);
				}
				break;

			case "ERROR":
				$this->dccClass->dccInform("Server Error: " . $line['text']);
				break;

			case "366":
				$params = explode(chr(32), $line['params']);
				$channel = $params[0];
				$this->dccClass->dccInform("Finished receiving NAMES list for " . $channel);
				break;

			case "005":
				if ($this->ircClass->getServerConf("NETWORK") != "")
				{
					//Only show this once...
					if (strpos($line['params'],"NETWORK") !== false)
					{
						$this->dccClass->dccInform("Parsing IRC-Server specific configuration...");
						$this->dccClass->dccInform("Network has been identified as " .  $this->ircClass->getServerConf("NETWORK") .
							"(" . $line['from'] . ")");
					}
				}
				break;

			case "315":
				$params = explode(chr(32), $line['params']);
				$this->dccClass->dccInform("Finished receiving WHO list for: " . $params[0]);
				break;

			case "368":
				$params = explode(chr(32), $line['params']);
				$this->dccClass->dccInform("Finished receiving ban list for: " . $params[0]);
				break;

			case "433":
				$this->dccClass->dccInform("Nick collision!  Unable to change your nick.  Nickname already in use!");
				break;

			default:
				break;

		}

		// Lets alias 004 to CONNECT, for the n00bs

		if ($line['cmd'] == "004")
		{
			$line['cmd'] = "connect";
		}
		if ($line['cmd'] == "error")
		{
			$line['cmd'] = "disconnect";
		}
		
		// Action type handler
		if (isset($this->cmdList['action']) && strtolower($line['cmd']) == "privmsg")
		{
			if (substr($line['text'], 0, 8) == chr(1) . "ACTION ")
			{
				$newLine = $line;
				$newLine['text'] = substr($line['text'], 8, strlen($line['text']) - 9);

				$sArgs = $this->createLine($newLine['text']);

				foreach($this->cmdList['action'] AS $item)
				{
					$func = $item['function'];
					$class = $this->cmdList['file'][$item['module']]['class'];
					$class->$func($newLine, $sArgs);
				}
			}
		}

		// Raw type handler
		if (isset($this->cmdList['raw']))
		{
			if (!isset($args))
			{
				$args = $this->createLine($line['text']);
			}

			foreach($this->cmdList['raw'] AS $item)
			{
				$func = $item['function'];
				$class = $this->cmdList['file'][$item['module']]['class'];
				$class->$func($line, $args);
			}
		}


		// Here we will call any type

		if (isset($this->cmdList[irc::myStrToLower($line['cmd'])]))
		{
			if (!isset($args))
			{
				$args = $this->createLine($line['text']);
			}

			foreach($this->cmdList[irc::myStrToLower($line['cmd'])] AS $item)
			{
				$func = $item['function'];
				$class = $this->cmdList['file'][$item['module']]['class'];
				$class->$func($line, $args);
			}
		}
		
		if (isset($args))
		{
			unset($args);
		}

	}


	/* Misc Functions */

	private function parseCtcp($line, $msgs = "PRIVMSG")
	{
		$cmd = str_replace(chr(1), "", $line['text']) . " ";
		$query = trim(substr($cmd, strpos($cmd, chr(32)) + 1));
		$cmd = substr(irc::myStrToLower($cmd), 0, strpos($cmd, chr(32)));

		$msg = "";

		switch($cmd)
		{
			case "version":
				$this->dccClass->dccInform("CTCP VERSION: " . $line['fromNick'] . " versioned us.");
				break;

			case "time":
				$this->dccClass->dccInform("CTCP TIME: " . $line['fromNick'] . " requested the time.");
				break;

			case "uptime":
				$this->dccClass->dccInform("CTCP UPTIME: " . $line['fromNick'] . " requested our uptime.");
				break;

			case "ping":
				$this->dccClass->dccInform("CTCP PING: " . $line['fromNick'] . " pinged us.");
				break;

			case "dcc":
				$vars = explode(chr(32), $query);
				$this->dccParse($line, $vars, $query);
				break;

		}

		if ($msg != "")
		{
			$this->notice($this->lVars['fromNick'], chr(1) . $msg . chr(1));
		}

		if (isset($this->cmdList['ctcp'][$cmd]))
		{
			$func = $this->cmdList['ctcp'][$cmd]['function'];
			$class = $this->cmdList['file'][$this->cmdList['ctcp'][$cmd]['module']]['class'];
			$args = $this->createLine($cmd . " " . $query);
			$class->$func($line, $args);
		}

	}

	function dccParse($line, $vars, $txt)
	{
		$cVars = count($vars);

		if ($cVars < 1)
		{
			return;
		}

		$cmd = irc::myStrToUpper($vars[0]);

		switch ($cmd)
		{
			case "CHAT":
				if ($cVars == 4)
				{
					$iplong = long2ip( (double) $vars[2]);
					$port = $vars[3];
					$this->dccClass->addChat($line['fromNick'], $iplong, (int) $port, false, null);
				}
				break;
			case "SEND":
				if ($this->ircClass->getClientConf('upload') != 'yes')
				{
					$this->ircClass->notice($line['fromNick'], "DCC: I do not accept dcc transfers at this time.", 0);
					break;
				}
				if ($cVars >= 5)
				{
					//Some bastard sent a file with spaces.  Shit. Ass.
					if (strpos($query, chr(34)) !== false)
					{
						$first = strpos($query, chr(34));
						$second = strpos($query, chr(34), $first + 1);
						$filename = substr($query, $first + 1, $second - $first - 1);
						$query = str_replace("\"".$filename."\"", "file.ext", $query);
						$vars = explode(chr(32), $query);
					}
					else
					{
						$filename = $vars[1];
					}

					$iplong = long2ip( (double) $vars[2]);
					$port = $vars[3];
					$filesize = $vars[4];

					$this->dccClass->addFile($line['fromNick'], $iplong, (int) $port, DOWNLOAD, $filename, $filesize);
				}
				break;
			case "ACCEPT":
				if ($cVars == 4)
				{
					$port = $vars[2];
					$bytes = $vars[3];
					$this->dccClass->dccAccept($port, $bytes);
				}
				break;
			case "RESUME":
				if ($cVars == 4)
				{
					$port = $vars[2];
					$bytes = $vars[3];
					$this->dccClass->dccResume($port, $bytes);
				}
				break;
		}

	}

}

/* Used to access dcc admin commands via private message */
class chat_wrapper {

	public $nick;
	private $ircClass;
	public $isAdmin;

	public function __construct($nick, $ircClass)
	{
		$this->nick = $nick;
		$this->ircClass = $ircClass;
		$this->isAdmin = 1;
	}

	public function dccSend($data, $to = null)
	{
		$this->ircClass->privMsg($this->nick, "--> " . $data);
	}

	public function disconnect($msg = "")
	{
		$this->ircClass->privMsg($this->nick, "Right........");
	}

}

?>
